home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -in_the_mag- / reader_requests / scilab / tests / colnew.tst < prev    next >
Text File  |  1999-09-16  |  257b  |  16 lines
  1. getf('SCI/tests/colnew.sci','c')
  2.  
  3. [z,zf]=col1();
  4. if maxi(abs(z-zf))>1.e-5 then pause,end
  5.  
  6. [z,zf]=col2(0);
  7. // Fortran Coded version 
  8. if maxi(abs(z-zf))>1.e-2 then pause,end
  9.  
  10. [z,zf]=col2(1);
  11. // Scilab coded version 
  12. if maxi(abs(z-zf))>1.e-2 then pause,end
  13.  
  14.  
  15.  
  16.